-- card: 3543 from stack: in
-- bmap block id: 4279
-- flags: 0000
-- background id: 2649
-- name: Automation


-- part 1 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=61 top=84 right=107 bottom=203
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  go to card "Automation"
end mouseUp



-- part 2 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=61 top=116 right=139 bottom=203
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  go to card "Sorting"
end mouseUp



-- part 3 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=61 top=147 right=170 bottom=203
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  go to card "HotKeys"
end mouseUp



-- part 4 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=61 top=179 right=202 bottom=203
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  go to card "Display"
end mouseUp



-- part 5 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=61 top=211 right=234 bottom=203
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  go to card "General"
end mouseUp



-- part 7 (field)
-- low flags: 00
-- high flags: 0000
-- rect: left=319 top=252 right=272 bottom=348
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 


-- part 8 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=315 top=286 right=308 bottom=377
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: OK
----- HyperTalk script -----
on mouseUp
  go card "SLBnames"
end mouseUp



-- part 9 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=383 top=286 right=308 bottom=445
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: OK
----- HyperTalk script -----
on mouseUp
  go to card "SLBnames"
end mouseUp



-- part 11 (button)
-- low flags: 00
-- high flags: 2006
-- rect: left=224 top=55 right=73 bottom=419
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp

  set the hilite of card button 9 to FALSE
  set the hilite of card button 10 to FALSE
  set the hilite of card button 11 to FALSE

  set the HILITE of ME to TRUE

end mouseUp



-- part 13 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=287 top=73 right=91 bottom=418
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: start
----- HyperTalk script -----
on mouseDown
  put line 1 of card field "Start" into zapper
  put "I am IN ,I am at Lunch ,I am out of the office" into MENU



  Get HPopupMenu(menu,0,69,280)
  if it is not zero then

    Put Item 1 of it into TheLine
    if TheLine is not empty then
      put theLine into card field "Start"
    else
      put zapper into card field "Start"
    end if

    If TheLine=1 then
      put it into card field "Start"
    end if


  end if

end mouseDown



-- part 14 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=288 top=171 right=189 bottom=419
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: shut
----- HyperTalk script -----
on mouseDown
  put line 1 of card field "Shut" into zapper
  put "I am IN ,I am at Lunch ,I am out of the office" into MENU



  Get HPopupMenu(menu,0,170,280)


  if it is not zero then

    Put Item 1 of it into TheLine
    if TheLine is not empty then
      put theLine into card field "Shut"
    else
      put zapper into card field "Shut"
    end if




    If TheLine=1 then
      put it into card field "Shut"
    end if


  end if

end mouseDown



-- part 15 (button)
-- low flags: 00
-- high flags: 2006
-- rect: left=224 top=109 right=127 bottom=421
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp

  set the hilite of card button 10 to FALSE
  set the hilite of card button 11 to FALSE
  set the hilite of card button 8 to FALSE

  set the HILITE of ME to TRUE

end mouseUp



-- part 16 (button)
-- low flags: 00
-- high flags: 6006
-- rect: left=224 top=73 right=91 bottom=287
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp

  set the hilite of card button 9 to FALSE
  set the hilite of card button 11 to FALSE
  set the hilite of card button 8 to FALSE

  set the HILITE of ME to TRUE

end mouseUp



-- part 17 (button)
-- low flags: 00
-- high flags: 2006
-- rect: left=224 top=92 right=109 bottom=420
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp

  set the hilite of card button 9 to FALSE
  set the hilite of card button 10 to FALSE
  set the hilite of card button 8 to FALSE

  set the HILITE of ME to TRUE

end mouseUp



-- part 18 (button)
-- low flags: 00
-- high flags: 2006
-- rect: left=224 top=152 right=171 bottom=419
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp

  set the hilite of card button 13 to FALSE
  set the hilite of card button 14 to FALSE
  set the hilite of card button 15 to FALSE

  set the HILITE of ME to TRUE

end mouseUp



-- part 19 (button)
-- low flags: 00
-- high flags: 6006
-- rect: left=224 top=170 right=188 bottom=287
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp

  set the hilite of card button 12 to FALSE
  set the hilite of card button 14 to FALSE
  set the hilite of card button 15 to FALSE

  set the HILITE of ME to TRUE

end mouseUp



-- part 20 (button)
-- low flags: 00
-- high flags: 2006
-- rect: left=224 top=190 right=207 bottom=420
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp

  set the hilite of card button 12 to FALSE
  set the hilite of card button 13 to FALSE
  set the hilite of card button 15 to FALSE

  set the HILITE of ME to TRUE

end mouseUp



-- part 21 (button)
-- low flags: 00
-- high flags: 2006
-- rect: left=224 top=207 right=225 bottom=421
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp

  set the hilite of card button 12 to FALSE
  set the hilite of card button 13 to FALSE
  set the hilite of card button 14 to FALSE

  set the HILITE of ME to TRUE

end mouseUp



-- part contents for card part 7
----- text -----
5

-- part contents for card part 13
----- text -----
I am IN 

-- part contents for card part 14
----- text -----
I am out of the office